Screensavers (Millenium Edition)/Screensavers (Millenium Edition).iso/Software/Cartoons/mmsaver.exe/mms.exe/mms.dxr/00043.ls

Text File | 1997-06-03 | 991 b | 29 lines

on exitFrame
  puppetTempo(4)
  set spritenum to 1
  set step to 4
  puppetSprite(spritenum, 1)
  if the locH of sprite 1 > 25 then
    puppetSound(1, "poem")
    go(#next)
  end if
  if the locH of sprite spritenum < 740 then
    set the locH of sprite spritenum to the locH of sprite spritenum + step
    if the name of member the memberNum of sprite spritenum = "snap" then
      set the memberNum of sprite spritenum to the number of member "blue2"
    else
      if the name of member the memberNum of sprite spritenum = "blue2" then
        set the memberNum of sprite spritenum to the number of member "snap"
      end if
    end if
  end if
  if the name of member the memberNum of sprite spritenum = "blue2" then
    set the locV of sprite spritenum to the locV of sprite spritenum - 3
  else
    if the name of member the memberNum of sprite spritenum = "snap" then
      set the locV of sprite spritenum to the locV of sprite spritenum + 3
    end if
  end if
  go(the frame)
end